100 POKE53280,0:POKE53281,0:POKE650,128 105 F=7:GOSUB685 110 PRINT"[147]":GOSUB125:GOTO215 115 REM RAHMEN UNTERPROGRAMM 120 FORX=ETOB STEPC:POKEX,D:POKEX+54272,F:NEXTX:RETURN 125 E=1025:B=1062:C=1:D=64:GOSUB120 130 E=1063:B=2023:C=40:D=66:GOSUB120 135 E=2022:B=1985:C=-1:D=64:GOSUB120 140 E=1984:B=1024:C=-40:D=66:GOSUB120 145 POKE1024,112:POKE1063,110:POKE2023,125:POKE1984,109 150 RETURN 155 REM EINGABE - FILTER 160 A=A+1:IFA=3THENRETURN 165 B=INT(RND(X)*3)+1 170 PRINT" ";TEXT$(B) 175 RETURN 180 REM QUIT 185 PRINT" PUNKTESTAND:";SC 190 PRINT" NOCHMAL? (J/N)" 195 GETA$:IFA$<>"J"ANDA$<>"N"GOTO195 200 IFA$="J"GOTO290 205 PRINT"[147]":END 210 PRINT"[147]":END 215 PRINT"[158] HALLO! HUHU! IST DA JEMAND?" 220 PRINT" IST DAS NICHT TOLL?" 225 PRINT" JETZT HAB ICH SCHON ZUVIEL VERRATEN!" 230 GETA$:IF A$="" GOTO230 235 PRINT"[147][153]":F=13:GOSUB125:A=0 240 PRINT" KARAMBA SOFT PRESENTS:":POKE646,A 245 PRINT" LATSCHKAPPE & CO":POKE646,A+5 250 PRINT" EIN STRATEGIESPIEL" 255 PRINT" FUER DIE GANZE FAMILIE" 260 PRINT"[153] WORTSCHATZ: SCHLUMPFE + (DING)" 265 PRINT" CHEAT: BOHRE NASE" 270 PRINT" THIS IS A SPACEBRAIN PRODUKTION!" 275 GETA$:IFA$<>""GOTO290 280 A=A+1:IFA=200THENA=1 285 GOTO240 290 SC=0:A=0:BA=1:TEXT$(1)="GELL, JA?" 295 TEXT$(2)="ICH BIN BOBBIN, BIST DU MEINE MUTTER?" 300 TEXT$(3)="ICH FUEHL MICH SO LEICHT UND KANN DOCH NICHT FLIEGEN." 305 PRINT"[147]":F=7:GOSUB125 310 POKE646,BA:PRINT" SZENARIO 1" 315 PRINT"[158] VOR DIR LIEGT EINE GRUENE TOMATE," 320 PRINT" NEBEN DIR EINE ROTE UND HINTER DIR" 325 PRINT" NOCH EINE. DU BIST UMZINGELT!" 330 PRINT" DU KOENNTEST JETZT EIN LIED SINGEN." 335 GETA$:BA=BA+1:IFBA=200THENBA=1 340 IFA$=""GOTO310 345 PRINT"[147]" 350 INPUT"";A$ 355 IFA$="BOHRE NASE"GOTO375 360 IFA$="SCHLUMPFE LIED"GOTO385 365 IFLEFT$(A$,9)="SCHLUMPFE"THENGOSUB155:IFA<3GOTO350 370 PRINT" DIE TOMATEN HABEN DICH GEFRESSEN!":GOTO185 375 PRINT" DIE DREI TOMATEN SCHAUEN DIR" 380 PRINT" INTERESSIERT ZU.":GOTO400 385 PRINT" DIE TOMATEN SIND GAR NICHT SO GEMEIN," 390 PRINT" WIE ES AUSSAH. DU NIMMST ALLE DREI" 395 PRINT" MIT.":SC=SC+100 400 GETA$:IFA$=""GOTO400 405 PRINT"[147]":A=0:GOSUB125 410 POKE646,BA:PRINT" SZENARIO 2" 415 PRINT"[158] ALS DU DIE TOMATEN SPAETER SUCHST," 420 PRINT" FINDEST DU EINEN GOLDENEN" 425 PRINT" RADIERGUMMI!" 430 GETA$:BA=BA+1:IFBA=200THENBA=1 435 IFA$=""GOTO410 440 PRINT"[147]" 445 INPUT" ";A$ 450 IFA$="BOHRE NASE"GOTO470 455 IFA$="SCHLUMPFE RADIERGUMMI"GOTO490 460 IFLEFT$(A$,9)="SCHLUMPFE"THENGOSUB155:IFA<3GOTO445 465 PRINT" DER TEPPICHBODEN HAT DICH ERWISCHT!":GOTO185 470 PRINT" DU DREHST DICH UM UND SIEHST EINEN" 475 PRINT" BRUNNEN. DIR WIRD SCHWARZ VOR AUGEN." 480 PRINT" NACH EINIGER ZEIT KOMMST DU WIEDER ZU" 485 PRINT" BEWUSSTSEIN.":GOTO510 490 PRINT" DU PFLANZT DEN RADIERGUMMI ZU EINEM":SC=SC+100 495 PRINT" GUMMIBAUM UND ENTDECKST DAHINTER EINEN" 500 PRINT" GEHEIMGANG. SCHADE, DASS DU JETZT" 505 PRINT" KEINE WACHSMALKREIDEN HAST." 510 GETA$:IFA$=""GOTO510 515 A=0:PRINT"[147]":GOSUB125 520 POKE646,BA:PRINT" SZENARIO 3" 525 PRINT"[158] KLEINE FLAUSCHIGE BLAUE DINGER" 530 PRINT" KOMMEN AUF DICH ZU UND WOLLEN" 535 PRINT" OFFENBAR MIT DIR SPIELEN." 540 GETA$:BA=BA+1:IFBA=200THENBA=1 545 IFA$=""GOTO520 550 PRINT"[147]" 555 INPUT" ";A$ 560 IFA$="BOHRE NASE"GOTO590 565 IFA$="SCHLUMPFE DINGER"GOTO600 570 IFLEFT$(A$,9)="SCHLUMPFE"THENGOSUB155:IFA<3GOTO555 575 PRINT" EIN RIESIGER TOPFLAPPEN FAELLT VOM" 580 PRINT" HIMMEL. DU HATTEST WIRKLICH KEINE" 585 PRINT" CHANCE!":GOTO185 590 PRINT" 'SCHAU MAL', SAGT EIN BLAUES DING," 595 PRINT" 'ICH KANN AUF DREI BEINEN STEHEN!'":GOTO620 600 PRINT" EIN BLAUES DING STRECKT DIR FRECH":SC=SC+100 605 PRINT" DIE ZUNGE HERAUS UND NIMMT DIR NACH" 610 PRINT" EINEM KURZEN HANDGEMENGE DEINE" 615 PRINT" TOMATEN WEG." 620 GETA$:IFA$=""GOTO620 625 PRINT"[147]":A=0:GOSUB125 630 POKE646,BA 635 PRINT" HERZLICHEN GLUECKWUNSCH! 640 [153]" DU HAST ES GESCHAFFT!" 645 [153]"SYS VOR DIR TUERMEN SICH";:[151]646,BA:[153]" SCHAETZESYS," 650 [151]646,BA:[153]" LOCHVERSTAERKERSYS UND UEBERHAUPT," 655 [151]646,BA:[153]" TOLLE STIMMUNGSYS!" 660 [153]" DEINE PUNKTZAHL:";:[151]646,BA:[153]SC;"VON 300" 665 [161]A$:BA[178]BA[170]1:[139]BA[178]200[167]BA[178]1 670 [139]A$[178]""[137]630 675 [153]"LOADSYS":[128] 680 [143] HINTERGRUND - INFO 685 [153]"LOAD":[141]125 690 [153]"SYS ZUM SPIEL:" 695 [153]" DIE ORIGINALFASSUNG DES SPIELES" 700 [153]" ENTSTAND ANFANG DER 90ER JAHRE IN" 705 [153]" TURBO BASIC GESCHRIEBEN FUER DEN PC." 710 [153]" DIE VORLIEGENDE NEUFASSUNG FUER DEN" 715 [153]" C64 IM MAERZ 2001 IST DER TIGER DISK" 720 [153]" GEWIDMET." 725 [153]" GREETINGS TO THE STOCK, WINNI AND" 730 [153]" RED SCORPION." 735 [153]" (C) BY KARAMBA SOFT" 740 [161]A$:[139]A$[178]""[137]740 745 [142]